Public Class IOLEDBError
	Inherits TcKs.MSOffice.Common.ChildObjectWrapperBase
	
	Friend Sub New ( ByVal nativeObject As Global.System.Object,  ByVal rootObject As Global.TcKs.MSOffice.Common.RootObjectWrapperBase )
		MyBase.New ( nativeObject, rootObject )
	End Sub 
	
	Public ReadOnly Property Application As Global.TcKs.MSOffice.Excel.Application
		Get 
			Dim ret As Global.TcKs.MSOffice.Excel.Application =  Me.FindTopRootObject()
			Return ret
		End Get 
	End Property 
	
	Public ReadOnly Property Creator As Global.TcKs.MSOffice.Excel.XlCreator
		Get 
			Return MyBase.WrappedObject.Creator
		End Get 
	End Property 
	
	Public ReadOnly Property Parent As Global.System.Object
		Get 
			Return MyBase.WrappedObject.Parent
		End Get 
	End Property 
	
	Public ReadOnly Property SqlState As Global.System.String
		Get 
			Return MyBase.WrappedObject.SqlState
		End Get 
	End Property 
	
	Public ReadOnly Property ErrorString As Global.System.String
		Get 
			Return MyBase.WrappedObject.ErrorString
		End Get 
	End Property 
	
	Public ReadOnly Property Native As Global.System.Int32
		Get 
			Return MyBase.WrappedObject.Native
		End Get 
	End Property 
	
	Public ReadOnly Property Number As Global.System.Int32
		Get 
			Return MyBase.WrappedObject.Number
		End Get 
	End Property 
	
	Public ReadOnly Property Stage As Global.System.Int32
		Get 
			Return MyBase.WrappedObject.Stage
		End Get 
	End Property 
	
End Class 
